#include <IE.au3>
#include <GuiConstants.au3>

; GUI
GuiCreate("User Name", 200, 100)
GuiSetIcon(@SystemDir & "\mspaint.exe", 0)
$pwInput = GUICtrlCreateInput("", 0, 35, 150, 30, $ES_PASSWORD)
$btn = GUICtrlCreateButton( "Send", 0, 70, 150, 30 )
$userInput = GUICtrlCreateInput("nemonemo", 0, 0, 150, 30)
GUISetState () 

$msg = 0
GuiSetState()
While GuiGetMsg() <> $GUI_EVENT_CLOSE
	$msg = GUIGetMsg()
	Select
           Case $msg = $btn
               exitloop
       EndSelect
WEnd

$sURL = "http://ara.kaist.ac.kr"
$oIE = _IECreate($sURL)

$o_form = _IEFormGetCollection ($oIE, 0)
$o_id = _IEFormElementGetObjByName ($o_form, "userid" )
$o_pw = _IEFormElementGetObjByName ($o_form, "userpw" )
_IEFormElementSetValue ($o_id, GUICtrlRead($userInput))
_IEFormElementSetValue ($o_pw, GUICtrlRead($pwInput))
_IEFormSubmit( $o_form )
Sleep(500)
